home *** CD-ROM | disk | FTP | other *** search
/ cyber.net interactivo 3 / inter@ivo 1996-04.iso / cybint3 / bin / classica.dxr / 00036.ls < prev    next >
Encoding:
Text File  |  1996-03-21  |  2.3 KB  |  97 lines
  1. on mouseUp
  2.   global flag
  3.   if rollOver(27) then
  4.     if flag = 0 then
  5.       go(2)
  6.     else
  7.       sound stop 1
  8.       sound playFile 3, "..\som\vlnpart4.wav"
  9.       go("pecas")
  10.     end if
  11.   end if
  12. end
  13.  
  14. on exitFrame
  15.   if rollOver(16) then
  16.     if the visible of sprite 6 = 0 then
  17.       sound playFile 2, "..\som\vlnint.wav"
  18.       set the visible of sprite 6 to 1
  19.     end if
  20.   else
  21.     set the visible of sprite 6 to 0
  22.   end if
  23.   if rollOver(17) then
  24.     if the visible of sprite 7 = 0 then
  25.       sound playFile 2, "..\som\vlnint.wav"
  26.       set the visible of sprite 7 to 1
  27.     end if
  28.   else
  29.     set the visible of sprite 7 to 0
  30.   end if
  31.   if rollOver(18) then
  32.     if the visible of sprite 8 = 0 then
  33.       sound playFile 2, "..\som\vlnint.wav"
  34.       set the visible of sprite 8 to 1
  35.     end if
  36.   else
  37.     set the visible of sprite 8 to 0
  38.   end if
  39.   if rollOver(19) then
  40.     if the visible of sprite 9 = 0 then
  41.       sound playFile 2, "..\som\vlnint.wav"
  42.       set the visible of sprite 9 to 1
  43.     end if
  44.   else
  45.     set the visible of sprite 9 to 0
  46.   end if
  47.   if rollOver(20) then
  48.     if the visible of sprite 10 = 0 then
  49.       sound playFile 2, "..\som\vlnint.wav"
  50.       set the visible of sprite 10 to 1
  51.     end if
  52.   else
  53.     set the visible of sprite 10 to 0
  54.   end if
  55.   if rollOver(21) then
  56.     if the visible of sprite 11 = 0 then
  57.       sound playFile 2, "..\som\vlnint.wav"
  58.       set the visible of sprite 11 to 1
  59.     end if
  60.   else
  61.     set the visible of sprite 11 to 0
  62.   end if
  63.   if rollOver(22) then
  64.     if the visible of sprite 7 = 0 then
  65.       sound playFile 2, "..\som\vlnint.wav"
  66.       set the visible of sprite 12 to 1
  67.     end if
  68.   else
  69.     set the visible of sprite 12 to 0
  70.   end if
  71.   if rollOver(23) then
  72.     if the visible of sprite 13 = 0 then
  73.       sound playFile 2, "..\som\vlnint.wav"
  74.       set the visible of sprite 13 to 1
  75.     end if
  76.   else
  77.     set the visible of sprite 13 to 0
  78.   end if
  79.   if rollOver(24) then
  80.     if the visible of sprite 14 = 0 then
  81.       sound playFile 2, "..\som\vlnint.wav"
  82.       set the visible of sprite 14 to 1
  83.     end if
  84.   else
  85.     set the visible of sprite 14 to 0
  86.   end if
  87.   if rollOver(25) then
  88.     if the visible of sprite 15 = 0 then
  89.       sound playFile 2, "..\som\vlnint.wav"
  90.       set the visible of sprite 15 to 1
  91.     end if
  92.   else
  93.     set the visible of sprite 15 to 0
  94.   end if
  95.   go(the frame)
  96. end
  97.